﻿Module Module1

    Sub Main()
        Dim dg As New DaGiac
        dg = DaGiac.Nhap()
        Dim cv As Double = dg.ChuVi()
        Console.Write("chu vi la:" & cv)
        Console.ReadLine()
    End Sub

End Module
